45 FOR A = 1 TO NL: INPUT T%(A): INPUT L%(A): NEXT A
50 FOR A = 1 TO NL: INPUT N$(A): NEXT A
55 PRINT D$"CLOSE THEME"
100 HOME : HGR : PRINT CHR$(4);"BLOAD PICDRAW":A$ = "COBRA": GOSUB 340: CALL 36400: VTAB 22: HTAB 10: PRINT "HI-RES MOVIE PART II": VTAB 24: PRINT "ALWAYS HIT A KEY TO GO ON. ";: GET Z$: HOME : TEXT : HOME : HTAB 16: PRINT "PROLOGUE"
110 PRINT : PRINT : PRINT "WHEN LAST WE LEFT OUR HERO, INDIANA JONES WAS DRIVING TO LORD SHIGEN'S MOUNTAIN RETREAT TO RESCUE THE DAUGHTER OF PROFESSOR AOKI WHO HAD BEEN KIDNAPPEDBY SHIGEN. BUT ALONG THE WAY A BULLET"
120 PRINT "BLEW OUT A TIRE, CAUSING HIM TO LOSE CONTROL OF THE JEEP AND SENDING IT CRASHING DOWN THE MOUNTAIN SIDE. BUT WHAT OF INDIANA JONES???";: GOSUB 1000: GET Z$: HGR :A$ = "B1": GOSUB 340: CALL 36400: HOME
130 VTAB 21: PRINT "BEFORE THE JEEP TUMBLES DOWN TO ITS PRE-DESTINED FIERY FATE, INDIANA JONES LEAPSOUT AND WHIPS ONTO HIS WOULD BE ASSASINSHELICOPTER.";: GET Z$: HOME :A$ = "B2": GOSUB 340: CALL 36400: PRINT CHR$(4);"BLOAD CHOP.ANM"
140 CALL 37284:X = 0
150 CALL 36928: FOR I = 1 TO 25: NEXT I: IF X > = 115 THEN 170
160 X = X +1: GOTO 150
170 PRINT CHR$(4);"BLOAD PICDRAW": VTAB 21: PRINT "NIGHT HAS FALLEN WHEN THE HELICOPTER FINALLY RETURNS TO THE RETREAT. AS THE HELICOPTER PASSES OVER AN OPEN AREA, INDIANA DROPS TO THE GROUND.";: GET Z$
180 HOME :A$ = "B3": GOSUB 340: CALL 36400: VTAB 21: PRINT "HE THEN HURRIES TO THE NEAREST DOOR. A DOOR WHICH OPENS INTO A STRANGE LOOKING WAREHOUSE.";: GET Z$: HOME :A$ = "B4": GOSUB 340: CALL 36400
190 VTAB 21: PRINT "INDIANA'S FACE CONTORTS IN HORROR WHEN HE REALIZES THAT THE WAREHOUSE IS FULL OF MILLIONS OF DOLLARS WORTH OF WEAPONS.";: GET Z$
200 HOME : VTAB 21: PRINT "REALIZING THE GREAT AMOUNT OF PAIN AND KILLING THESE WEAPONS WOULD CAUSE, HE SHOOTS A BULLET INTO A CASE OF DYNAMITE CAUSING A TERRIBLE CHAIN REACTION.";: GET Z$: HOME :A$ = "BLOW": GOSUB 340: CALL 36405
210 VTAB 22: PRINT "BRROOOOOOMMMMM!!!!!";: GET Z$: HOME :A$ = "B5": GOSUB 340: CALL 36400
220 VTAB 21: PRINT "IN THE CONFUSION CAUSED BY THE EXPLOSIONAND SUBSEQUENT FIRES, INDIANA EASILY GOES UNDETECTED AS HE FINDS MIKO AOKI AND TAKES HER TO THE HELICOPTER.";: GET Z$
230 HOME : VTAB 21: PRINT "ONLY A LONE FIGURE WATCHES THEM LEAVE WITH A HATE FILLED EYE. HE CURSES THEM THROUGH CLENCHED TEETH KNOWING HE CANNOTSTOP THEM.";: GET Z$: HOME :A$ = "B6": GOSUB 340: CALL 36400
240 VTAB 21: PRINT "SHIGEN: INDIANA JONES! YOU HAVE ESCAPED MY EVERY ATTEMPT TO KILL YOU;YOU HAVE DESTROYED MY CACHE OF WEAPONS, AND NOW YOU STEAL FROM";: GET Z$
250 HOME : VTAB 21: PRINT "SHIGEN: ME MY ONLY LEVERAGE OVER THAT PACIFIST FOOL AOKI. BUT I PRO- MISE YOU MR. JONES THAT WHEN NEXT WE MEET YOU SHALL DIE!!!";: GET Z$: HOME :A$ = "B7": GOSUB 340: CALL 36400
260 VTAB 21: PRINT "AS THE HELICOPTER FLIES INDIANA AND MIKOAWAY TO SAFETY, THE CHAIN REACTION OF EXPLOSIONS ENDS WITH ONE LAST HORRIBLE BLAST!!!";: GET Z$: HOME :A$ = "B8": GOSUB 340: CALL 36400
270 VTAB 21: PRINT "AOKI: INDIANA, MY FRIEND, YOU HAVE SAVED MY DAUGHTER AND RETURNED HONOR TO MY HOUSE. IS THERE ANY WAY I CAN REPAY YOU?";: GET Z$
280 HOME : VTAB 21: PRINT "JONES: SURE, HOW WOULD YOU LIKE TO BUY A USED HELICOPTER CHEAP??? ALL: HA! HA! HA!";: GET Z$: HOME : VTAB 22: HTAB 16: PRINT "THE END ";: GET Z$
285 GOSUB 1000
290 TEXT : VTAB 23: PRINT : FOR I = 1 TO 32: READ Y$: PRINT Y$: FOR J = 1 TO 400: NEXT J: NEXT I: FOR K = 1 TO 10: FOR L = 1 TO 400: NEXT L: PRINT : NEXT K: PRINT CHR$(4)"RUNKICK.IT.OFF"
300 DATA INDIANA JONES.............HARRISON FORD, ,PROFESSOR AOKI...........TOSHIRO MIFUNE, ,LORD SHIGEN.............CHRISTOPHER LEE
